﻿Public Class _Default1
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Dim data As New List(Of data)
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        data.Add(New data(1, "aaaa"))
        ListView1.DataSource = data
        ListView1.DataBind()
    End Sub
    Class data
        Sub New(xId As Integer, xName As String)
            _name = xName
            _ID = xId

        End Sub
        Private _ID As Integer
        Public Property ID() As Integer
            Get
                Return _ID
            End Get
            Set(ByVal value As Integer)
                _ID = value
            End Set
        End Property
        Private _name As String
        Public Property Name() As String
            Get
                Return _name
            End Get
            Set(ByVal value As String)
                _name = value
            End Set
        End Property


    End Class
End Class